inherited FCadastroProcesso: TFCadastroProcesso
  Left = 267
  Top = 87
  Caption = 'Cadastro Processo acompanhamento pedido Venda'
  Constraints.MinHeight = 219
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  inherited pcCadastro: TPageControl
    inherited TsCadastro: TTabSheet
      inherited panel1: TPanel
        object Label14: TLabel [0]
          Left = 7
          Top = 47
          Width = 40
          Height = 16
          Caption = 'Codigo'
        end
        object DBText1: TDBText [1]
          Left = 7
          Top = 73
          Width = 52
          Height = 16
          Alignment = taCenter
          AutoSize = True
          DataField = 'PROC_CODIGO'
          DataSource = dsCadastro
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clRed
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label1: TLabel [2]
          Left = 76
          Top = 47
          Width = 58
          Height = 16
          Caption = 'Descri'#231#227'o'
        end
        inherited panel2: TPanel
          inherited DBNavigator1: TDBNavigator
            Hints.Strings = ()
          end
        end
        inherited panel3: TPanel
          inherited BtnConsuta: TBitBtn
            OnClick = BtnConsutaClick
          end
        end
        object DBENome: TDBEdit
          Left = 76
          Top = 68
          Width = 506
          Height = 24
          CharCase = ecUpperCase
          DataField = 'PROC_DESCRICAO'
          DataSource = dsCadastro
          TabOrder = 2
        end
      end
    end
  end
  inherited dsCadastro: TDataSource
    Left = 168
    Top = 120
  end
  inherited QCadastro: TQuery
    SQL.Strings = (
      'select * from processo'
      'Order by Proc_Codigo'
      '')
    Left = 168
    Top = 152
  end
  object QProcesso: TQuery
    DatabaseName = 'base'
    RequestLive = True
    SQL.Strings = (
      'select * from processo'
      'Order by Proc_Codigo')
    Left = 255
    Top = 130
  end
  object DSProcesso: TDataSource
    DataSet = QProcesso
    Left = 287
    Top = 130
  end
end
